home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 32 / Amiga Format AFCD32 (Nov 1998, Issue 117).iso / -seriously_amiga- / programming / basic / blitzlistguide / blitzlistfiles / consolewindow < prev    next >
Text File  |  1998-08-10  |  294b  |  21 lines
  1. WBStartup
  2. NoCli
  3. WBenchToFront_
  4. FindScreen 0
  5.  
  6. DosBuffLen 0        ;needed to force immediate output to the "file"
  7.  
  8. If WriteFile (0,"CON:0/50//100/TEST/CLOSE")
  9.   FileOutput 0
  10.   NPrint "Just a test"
  11.   VWait 20
  12.   MouseWait
  13.   CloseFile 0
  14. Else
  15.   BeepScreen 0      ;something went wrong!
  16. EndIf
  17.  
  18. End
  19.  
  20.  
  21.